#$infile = "/data4/bsi/RandD/Workflow/temp/Easy_imputer_test/GBM/AFFY/temp/imputation";
$infile =$ARGV[0];
chomp($infile);

for($i1=1;$i1<24;$i1++)
{
	open(BUFF,"gunzip -c $infile/$i1/Combined_impute_results_3_prob_ind.gz|") or die "no file exists\n";
	while(<BUFF>)
	{
		chomp($_);
		@array = split(" ",$_);
		print "$array[0] $array[1]\n";
	}
}
